package com.lagou.edu.factory;

import com.lagou.edu.annotations.Autowired;
import com.lagou.edu.annotations.Repository;
import com.lagou.edu.annotations.Service;
import com.lagou.edu.annotations.Transactional;

import java.io.Closeable;
import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.lang.annotation.Annotation;
import java.lang.reflect.Field;
import java.lang.reflect.Method;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * @author liulin
 *
 * 扫描注解，生产对象、依赖注入、事务控制
 */
public class MyAnnotationScanner {

    private MyAnnotationScanner() {
    }

    private static Map<String,Object> beanMap = new HashMap<>();  // 存储对象
//    private static Map<String, String> classNameObjNameMap = new HashMap<>(); // 存储类的全路径名->beanId关系

    static {

        try {
            // 先从xml中读取需要扫描的包路径
            String scannPackage = "com.lagou.edu";

            List<Class<?>> classList = getClasses(scannPackage);

            // 先只处理Repository和Service注解，创建对象
            for (Class<?> clazz: classList) {
                Annotation[] annotations = clazz.getAnnotations();
                if (annotations.length > 0) {
                    // 有注解
                    for (Annotation annotation: annotations) {
                        String beanId = clazz.getSimpleName();
                        // 目前只处理Repository和Service这两种类型，需要创建对象
                        // 取出注解的value，如果value为空，则默认使用类名首字母小写
                        if (annotation.annotationType() == Repository.class) {
                            Repository repository = clazz.getAnnotation(Repository.class);
                            String value = repository.value();
                            if (!value.equals("")) {
                                beanId = value;
                            }
                        } else if (annotation.annotationType() == Service.class) {
                            Service service = clazz.getAnnotation(Service.class);
                            String value = service.value();
                            if (!value.equals("")) {
                                beanId = value;
                            }
                        } else {
                            continue;
                        }
                        beanId = toLowerCaseFirstOne(beanId);
                        // 通过反射技术实例化对象
                        Object o = clazz.newInstance();  // 实例化之后的对象
                        // 存储到map中待用
                        beanMap.put(beanId,o);

                        // 存储类的全路径名->beanId关系
//                        String classFullName = clazz.getName();
//                        classNameObjNameMap.put(classFullName, beanId);
                    }
                }
            }

            // 再次遍历，处理属性注入
            for (Class<?> clazz: classList) {
                Field[] fields = clazz.getDeclaredFields();
                for (Field field: fields) {
                    Autowired autowired = field.getAnnotation(Autowired.class);
                    if (autowired != null) {
                        // 处理有Autowired注解的属性
                        Object fileObj = null;
                        if (autowired.value().equals("")) {
                            // 注解没有标记beanId
                            Class<?> fieldClass =  field.getType();
                            String fieldObjName = fieldClass.getName();
                            Class fileObjClass = Class.forName(fieldObjName);
                            String fieldObjBeanId = "";
                            if (fileObjClass.isInterface()) {
                                // 属性注入的是接口，需要找到接口下面的实现类
                                List<Class> interfaceImplClassList = getAllClassByInterface(fileObjClass);
                                if (interfaceImplClassList.size() == 0) {
                                    // 没有实现类
                                    throw new RuntimeException("接口：" + fileObjClass.getSimpleName() + " 没有个实现类");
                                }
                                if (interfaceImplClassList.size() > 1) {
                                    // 有多个实现类必须要标记beanId
                                    throw new RuntimeException("接口：" + fileObjClass.getSimpleName() + " 有多个实现类，属性注入时需要指明beanId");
                                }
                                fieldObjBeanId = toLowerCaseFirstOne(interfaceImplClassList.get(0).getSimpleName());

                            } else {
                                // 属性注入的就是实现类或普通类
                                fieldObjBeanId = toLowerCaseFirstOne(fieldClass.getSimpleName());
                            }
                            fileObj = beanMap.get(fieldObjBeanId);
                        } else {
                            // 注解有标记beanId，直接从beanMap里面取
                            fileObj = beanMap.get(autowired.value());
                        }

//                        Object selfObj = beanMap.get(classNameObjNameMap.get(clazz.getName()));
                        Object selfObj = beanMap.get(toLowerCaseFirstOne(clazz.getSimpleName()));

                        // 给属性设值
                        field.setAccessible(true);
                        field.set(selfObj, fileObj);
                    }
                }
            }

            // 遍历所有class，处理添加事务控制
            MyAnnotationProxyFactory myAnnotationProxyFactory = (MyAnnotationProxyFactory) beanMap.get("myAnnotationProxyFactory");
            for (Class<?> clazz: classList) {
                String beanId = toLowerCaseFirstOne(clazz.getSimpleName());
                Object selfObj = beanMap.get(beanId);
                if (selfObj != null) {
                    beanMap.put(beanId, myAnnotationProxyFactory.getJdkProxy(selfObj));
                }
            }
        } catch (Exception e) {
            e.printStackTrace();
        }

        System.out.println("beanMap ==== " + beanMap);
    }


//    @Override
//    public Object postProcessAfterInitialization(Object bean, String beanName) throws BeansException {
//        System.out.println("postProcessAfterInitialization  beanName === " + beanName);
//        return bean;
//    }


    public static String toLowerCaseFirstOne(String s){
        if (s == null || s.length() == 0) {
            return "";
        }
        if(Character.isLowerCase(s.charAt(0)))
            return s;
        else
            return (new StringBuilder()).append(Character.toLowerCase(s.charAt(0))).append(s.substring(1)).toString();
    }


    /**
     * @Description: 根据一个接口返回该接口的所有类
     * @param c 接口
     * @return List<Class>    实现接口的所有类
     */
    @SuppressWarnings("unchecked")
    public static List<Class> getAllClassByInterface(Class c){
        List returnClassList = new ArrayList<Class>();
        //判断是不是接口,不是接口不作处理
        if(c.isInterface()){
            String packageName = c.getPackage().getName();	//获得当前包名
            try {
                List<Class<?>> allClass = getClasses(packageName);//获得当前包以及子包下的所有类

                //判断是否是一个接口
                for(int i = 0; i < allClass.size(); i++){
                    if(c.isAssignableFrom(allClass.get(i))){
                        if(!c.equals(allClass.get(i))){
                            returnClassList.add(allClass.get(i));
                        }
                    }
                }
            } catch (Exception e) {
                // TODO: handle exception
            }
        }
        return returnClassList;
    }


    /**
     * 从包package中获取所有的Class
     * @param packageName
     * @return
     */
    public static List<Class<?>> getClasses(String packageName){

        //第一个class类的集合
        List<Class<?>> classes = new ArrayList<Class<?>>();
        //是否循环迭代
        boolean recursive = true;
        //获取包的名字 并进行替换
        String packageDirName = packageName.replace('.', '/');
        //定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
            //循环迭代下去
            while (dirs.hasMoreElements()){
                //获取下一个元素
                URL url = dirs.nextElement();
                //得到协议的名称
                String protocol = url.getProtocol();
                //如果是以文件的形式保存在服务器上
                if ("file".equals(protocol)) {
                    //获取包的物理路径
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                    //以文件的方式扫描整个包下的文件 并添加到集合中
                    findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
                } else if ("jar".equals(protocol)){
                    //如果是jar包文件
                    //定义一个JarFile
                    JarFile jar;
                    try {
                        //获取jar
                        jar = ((JarURLConnection) url.openConnection()).getJarFile();
                        //从此jar包 得到一个枚举类
                        Enumeration<JarEntry> entries = jar.entries();
                        //同样的进行循环迭代
                        while (entries.hasMoreElements()) {
                            //获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                            JarEntry entry = entries.nextElement();
                            String name = entry.getName();
                            //如果是以/开头的
                            if (name.charAt(0) == '/') {
                                //获取后面的字符串
                                name = name.substring(1);
                            }
                            //如果前半部分和定义的包名相同
                            if (name.startsWith(packageDirName)) {
                                int idx = name.lastIndexOf('/');
                                //如果以"/"结尾 是一个包
                                if (idx != -1) {
                                    //获取包名 把"/"替换成"."
                                    packageName = name.substring(0, idx).replace('/', '.');
                                }
                                //如果可以迭代下去 并且是一个包
                                if ((idx != -1) || recursive){
                                    //如果是一个.class文件 而且不是目录
                                    if (name.endsWith(".class") && !entry.isDirectory()) {
                                        //去掉后面的".class" 获取真正的类名
                                        String className = name.substring(packageName.length() + 1, name.length() - 6);
                                        try {
                                            //添加到classes
                                            classes.add(Class.forName(packageName + '.' + className));
                                        } catch (ClassNotFoundException e) {
                                            e.printStackTrace();
                                        }
                                    }
                                }
                            }
                        }
                    } catch (IOException e) {
                        e.printStackTrace();
                    }
                }
            }
        } catch (IOException e) {
            e.printStackTrace();
        }

        return classes;
    }

    /**
     * 以文件的形式来获取包下的所有Class
     * @param packageName
     * @param packagePath
     * @param recursive
     * @param classes
     */
    public static void findAndAddClassesInPackageByFile(String packageName, String packagePath, final boolean recursive, List<Class<?>> classes){
        //获取此包的目录 建立一个File
        File dir = new File(packagePath);
        //如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            return;
        }
        //如果存在 就获取包下的所有文件 包括目录
        File[] dirfiles = dir.listFiles(new FileFilter() {
            //自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            public boolean accept(File file) {
                return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
            }
        });
        //循环所有文件
        for (File file : dirfiles) {
            //如果是目录 则继续扫描
            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "." + file.getName(),
                        file.getAbsolutePath(),
                        recursive,
                        classes);
            }
            else {
                //如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0, file.getName().length() - 6);
                try {
                    //添加到集合中去
                    classes.add(Class.forName(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    e.printStackTrace();
                }
            }
        }
    }

    public static  Object getBean(String id) {
        return beanMap.get(id);
    }

}
